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PREFACE 



This final report contains the FORTRAN version of the 
computer program to design school bus routes along with 
complete explanations of input data and sample input and 
output for the program. The rationale of the computer solution 
can be found in the final report of Cooperative Research Project 
No. 1605 and is not presented in this report. 

I would like to thank George Hnilicka, Racine Public 
School System, Racine, Wisconsin, who kindly consented to 
test the FORTRAN version of the program on one -of his 
small systems. He reviewed the User's Manual and made 
several constructive comments about the manual. A1 Jensen, 
Computer Center, Racine Public School System, Racine, Wisconsin, 
and Mr. Hnilicka spent many hours reviewing the manual and 
testing the school bus FORTRAN program on their computer system. 
Their comments are included in this report. 

Special recognition is given to Judson Nichols and his 
staff at the Dade County Public School System, Miami, Florida, 
for his continuous efforts in helping to test and evaluate the 
school bus scheduling program. Mr. Nichols has offered timely 
and constructive suggestions throughout a five-year period. 

Special recognition is given to Robert A. Larsen, Robbinsdale 
Public School System, Robbinsdale, Minnesota, who has maintained 
a continuing interest in this program and has greatly encouraged 
continued work in this area. 

If there are any errors in this report, the program, or 
the User's Manual, the’ director alone is responsible. 

Everything has been checked diligently in order to minimize 
mistakes, but inevitably some errors will still appear. 



o 

ERIC 



iii 



SUMMARY 



Purpose 

The purpose of this study was to convert to FORTRAN language 
the computer program that was developed in Cooperative Research 
Project 1605, "The Use of a Computer to Design School Bus Routes". 

Scope 



The original program was written in Symbolic Programming 
System (SPS), a language specifically for use with the IBM 1620 
Computer. Because of demands for the program changes and develop- 
ments in computer equipment, and because of the differences in 
the sophistication of personnel, greater application of the program 
is possible when written in FORTRAN, a more widely used computer 
language. Specific objectives were to: (1) convert the SPS 

program to FORTRAN language, (2) expand and refine the program 
to increase the speed, decrease the memory requirements, and 
(3) to present the program with detailed comments. 

Contribution 



The revised program offers school administrators and trans- 
portation department heads an efficient method of coping with the 
clerical tasks involved in school bus routing, thus enabling 
school systems to use more effectively both professional and 
clerical personnel. 

Method 



The present FORTRAN program yields the following outputs: 
bus route with verbal description of pick-up points, time arriving 
at point, and time returning to point; student riding time; and 
bus time (cost). The entire program has been tested by processing 
data from two independent school systems. 
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INTRODUCTION 



I 



The intent of this report is the presentation of a FORTRAN 
program that may be used in designing school bus routes. 

The explanation is directed toward transportation personnel in 
any school system who might wish to implement the program. The 
general procedure is a heuristic solution and no formal attempt 
has been made to analyze it from a mathematical (theoretical) 
point of view. A flow chart of the algorithm is given on the 
following page. Detailed descriptions of the development, 
definitions of all terms, and the evaluation of the algorithm 
has been presented in the final reports of Cooperative Research 
Projects 783 and 1605. These reports are available through 
Educational Resources Information Center (ERIC), ERIC Document 
Reproduction Service, National Cash Register Company, 

4396 Fairmont Avenue, Bethesda, Maryland, 20014. 

Since the outset of Cooperative Research Projects 783 
(completed 1961) and 1605 (completed 1964), many requests 
for information and/or assistance have been received. The 
majority of these requests has come from city, state, and county 
public education personnel and from state college and university 
personnel. Specific requests have been received for the exist- 
ing program converted to FORTRAN language. 

• 

Since the publication of Cooperative Research Project l605> 
many improvements and refinements have been made to the existing 
program and these improvements have been described elsewhere 
(Boyer, Ross, and Ross, 1967 ). 
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Flow chart for school bus problem 
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METHODS AND RESULTS 



The FORTRAN computer program is presented in Table 1. 

Every attempt was made to produce a readily comprehensible 
program j thus, many comments have been incorporated. The 
program is written in IBM FORTRAN IV, Level G and requires 
two sequential data sets (tapes or disks). The program 
has been tested on IBM 360/40 computer. 

An operator’s manual is given in Appendix A. As a 
result of the continuing improvements in data processing 
equipment and techniques and in school transportation 
methods, the manual is continuously being improved and any 
prospective user is advised to secure the most recent edition 
from the Project Director. 

After reviewing the computer solutions for a relatively 
small rural attendance center, Mr. George Hnilicka, Racine 
Wisconsin, reported that the computer solutions tended to compare 
favorably with routes prepared manually, and in some cases, 
the computer solutions were better. Futhermore, he stated that 
the computer solutions probably would be much better in urban 
areas than in rural communities. In any attempt to use a 
computer program to design school bus routes, Mr. Hnilicka 
felt 'that some type of technical assistance would be highly 
desirable. He found the User’s Manual (see Appendix A) to be 
very helpful because it contained a complete set of input and 
output data. 



TABLE 1 



C 

C 

C 

C 

C 

C 

C 

C 

C 



C 

C 



MAIN LINE PROGRAM 
IMPLICIT INTEGER*2( A-Z ) 

INTEGER * 4 CODE » RCODE » BUSX, KIDSX,LMATX 
INTEGER** BLANK 
INTEGER*^ NRC»MAXM» MILE» MMAXM 
INTEGER** ATYPE 

NAME OF CAPACI1Y OF NO. OF NO. OF TYPES 

p 0INT EACH BUS POINT OF KIDS AT POINT 

DIMENSION ATYPE ( 5 ) » NBC(50)» MPTN(150)» MTYPE(150»5) 

TOTAL NUMBER OF KIDS AT EACH POINT BY TYPE 
DIMENSION NTKID ( 5 ) 



C 

C 

1 

2 

3 

4 



DIMENSION 



POINTS IN SUGGESTED ROUTE 
NSUG( 150) 



ACCUMULATORS OR WORK AREAS 

DIMENSION NACC ( 52 ) » MACCl 52) ,LACG( 52) ,NSUGW( 150) ,KTYPE (5) 

DIMENSION SUBS (150) 



c 
! c 




NUMBER OF 


DISTANCE OF MAXIMUM 


1 r 




POINT 


POINT NUMBER II 


! u 


DIMENSION 


LMAT ( 1500 ) 


• ML INK ( 1500) » NML ( 150) 


i c 

i r 






RELOCATION 


! v 

! 

i r 






FACTOR 


V 


DIMENSION 




NREL ( 150 ) 


! c 

i C 




STARTING POINT 


MAX STUDENT RIDING TIME 


1 c 




MATRIX 


FOR EACH BUS 


! ** 
1 C 


DIMENSION 


NST ( 150) t 


NBUSM ( 50 ) 


\i 


» 

1 


OVERLOAD ALLOWED ON 


EACH BUS 


s 


DIMENSION 


NOVLDI 50) 





*********** ********************************************************** 
COMMON NRC» MAXM» M I LE» MMAXM 

COMMON MPTN*NTOT »NREL» NSST,MTYPE»KTYPEf NBC tNOVLD* NBCPVV 

COMMON LACC»NACC»MACC 
COMMON NTYPE* NML »NRTC » LINE 
COMMON RT » NBUSM 

COMMON /ABC/LNPTS* JXY* NST » SUBStNSUGWtLMAT * ML INK 
DATA BLANK / 1 •/ » BUSX / 1 BUS* /» K IDSX/ *K IDS 1 /» LMATX/ • LMAT • / 
********************************************************************* 

FORMAT ( 201 5 ) 

FORMAT (I5»18(A4|1X) ) 

FORMAT ( IH 21HCAN NOT GO FROM POINT I7»iOH TO POINT 17) 

FORMAT ( IH025HCANN0T PROCEED WITH ROUTE» I6/1HI) 
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me 



TABLE 1 CONTINUED 



FORMAT ( 1H1 ) 

WRITE (6,5) 

REWIND 1 
REWIND 2 
NSST=800 
NEND=300 
DO 900 KKK=1 , 52 
LACC ( KKK ) =0 
MACC(KKK)=0 
0 NACC ( KKK )=0 

1 i***I**I**«*«***««**********^******^***^*******^**** 5ft * 3{£ * :,c * :sc5<< * :,c< ‘** j(t3,t * 3{ ' <s,i:< '* 3<:5<S5!: 



NO. OF 
DIFF. 

TYPES 

POINT NAMES OF DIFFERENT 

INPUT TYPES OF POINT INPUT 



PRINT 

CODE 



RETURN CODE FOR 
SUGG ROUTES 

BLANK=NONE, BUS=NEW CAP 
KIDS=NEW KIDS MATRIX 
LMAT=NEW LMAT , MLI NK MA 
ALL=COMPLETE NEW SET 



READ(5,2,END=302 ) NTYPE, (ATYPE ( J ), J=1,NTYPE ) ,CODE, RCODE 

********************************************************************* 

READ NUMBER OF BUS AND BUS CAPACITY AND MAX STUDENT IJI^ING Time 
FOR EACH BUS • LEAVE NBUSM(K) BLANK IF MAX S R T IS TO BE COMPUTED 
IF THERE IS AN OVERLOAD ALLOWED ON A BUS, ENTER IN THE FOURTH FIELD 
READ UNTIL A (/*) IS ECOUNTERED 

****************************************************************** 

I F (CODE. NE. BLANK) WRITE (6, 6611) NTYPE, ( AT YPE (J ), J=1 . NT YPE) .CODE , RC 
10DE 

ill FORMAT ( • • 1 5 , 18 ( A4, IX ) ) 

)55 CONTINUE 

IFtCODE.NE. BLANK) WRITE(6*6666) 

566 FORMAT C • 0 BUS NO. CAP MSRT OVLD* ) 

NBUS=0 

5 CONTINUE 

READ(5, 1,END=100) K, WORKK 
IFtK.EQ.9999) GO TO ICO 
NBC( K ) =WORKK ( 1 ) 

NBUSM(K)=W0RKK(2) 

NOVLD ( K)=WORKK ( 3 ) 

NBUS=NBUS+1 

IFtCODE.EQ. BLANK) GO TO 95 

WRITE (6, 1006 ) K,NBC ( K ) » NBUSMt K ) , NOVLD ( K ) 

GO TO 95 
00 CONTINUE 

IF(RCODE.EQ.BUSX.AND.NTIMT.NE.O) GO TO 161 

Oil CONTINUE kl>pwr>f _ 4 

IF (CODE. NE. BLANK) WRITE ( 6,6667 ) ( ATYPE ( J ) ,J=1 , NTYPE ) 
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TABLE 1 CONTINUED 



>667 FORMAT ( • 0 PT NO N18(A4,1X)) 

NKl D=0 

* *********************************** **************************** ****** 
; ZERO TOTAL NUMBER IF KIDS BY TYPE 
DO 105 J=1 , NTYPE 
105 NTK ID( J )=0 

‘ * ***********************<******************************************** 

t READ POINT NUMBER AND NUMBER OF DIFFERENT TYPES OF KIDS AT EACH 
fc POINT. READ UNTIL A (/*) CARD IS ENCOUNTERED 

f ************ ******************* *********************************** 

110 NN=1 

113 READ ( 5, 1 , END=120 ) MPT, ( MTYPE ( NN, K ) ,K= 1 , NTYPE ) 

IF ( MPT.EQ. 9999 ) GO TO 120 
115 DO 117 J-l. NTYPE 

NKID=NKID+MTYPE( NN, J ) 

117 NTKID( J )=NTKID( J ) 6MTYPE ( NN, J ) 

MPTN(NN)=MPT 
NML( NN)=0 
NREL (NN )=0 
NN=NNC1 

IF(CODE.EQ. BLANK) GO TO 113 

WRITE(6, 1006 IMP T , (MTYPE ( NN-1,K ) ,K=1, NTYPE) 

GO TO 113 
C 

c ******************* ************************************ ************** 
C READ A POINT NUMBER WITH ALL POINTS ( LMAT ) THAT IS POSSIBLE 
C TO GO TO FROM THE POINT AND THE ASSOCIATED DISTANCE (MLINK). 

C READ UNTIL A (/*) CARD IS ENCOUNTERED 

Q ****************************************************************** 

c 

120 CONTINUE 

I F (RCODE.EQ.KI DSX.AND.NT IMT .NE. 0) GO TO 161 
1012 CONTINUE 
NCK=0 
NPT$=NN-1 
NPL=1 

125 READ(5, 1,END=180 ) MPT, (NACC( J) ,MACC( J) , J=l,7) 

IF ( MPT.EQ.9999 ) GO TO 180 
127 CALL LOOKUP(MPT,NPTS,NC) 

IF(NC-1)133, 125,133 
133 CONTINUE 

IF ( MPT-NCK) 130,140,130 
130 NN=1 

NREUMPT ) = NPL 
NCK=MPT 
NML( MPT )=0 
140 DO 160 J=1 * 7 

I F (NACC (J) 1150,160,150 
150 CALL LOOKUP (NACC ( J ) , NPTS ,NC ) 

IF ( NC-l ) 134, 160,134 
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TABLE 1 CONTINUED 



34 CONTINUE 

LMAT (NPL )-NACC ( J ) 

ML INK! NPL) -M ACC ( J ) 

NML! NCK )=NN 
55 NPL-NPLCl 
NN=NNC1 
60 CONTINUE 
GO TO 125 

• *******#****^******<^ ******** *************** ******** ************** 

> 

► WRITE DATA FOR USE IN PRINT PROGRAM AND. WRITE CHECK DATA IF DESIRED 

« ****************************************************************** 

b, 

*80 CONTINUE 

WRITE! 1*2222) NPTS*NBUS*NSST*NEND*NTYPE* ATYPE 
WRITE! 1*2225) NBC*MPTN*NREC*MTYPE 
£225 FORMAT (40A2) 

£222 FORMAT (5A2* 5 A4) 



WRITE (6* 5) 

WRITE (6,6668 ) 

6668 FORMAT! • LMAT AND ML INK MATRIX 1 //) 

DO 1000 J=1,NPTS 
IFINML! J)*NE*0) GO TO 962 
WRITE (6* 1005 ) MPTN(J) 

GO TO 1000 
962 CONTINUE 

KA=NREL ( J ) 

KB=KA£NML( J)-l 

WRITE (6, 1005) MPTN! J ) * (MPTNtLMAT ( LL ) ) *LL=KA, KB ) 

WRITE (6 ,1006) (MLINK(LL) ,LL=KA, KB) 

1006 FORMAT ( 1H 5X,24I5) 

1000 CONTINUE 
C 

C ****************************************************************** 

c 

161 . CONTINUE 

C 

WRITE (6* 5) 

1611 CONTINUE 
C 

£ ***** ****$$♦************************ #*#**#*# ***$**** ********$**$** * 



1005 FORMAT ( *0*2515) 





C 

C 

c 

c 



READ! 5 * 1 *END=302 ) N, LBUS, NRTC, 



NUMBER NUMBER NUMBER ROUTES 
POINTS BUSSES TO CONSIDER 



NUMBER OF PTS. NOT 
SHIFTED AT END OF RT 
IF BLANK ASSUME 1 



NPTD 
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TABLE 1 CONTINUED 




IF(N.EQ.9999) GO TO 302 

$#**$****************#******************************************** 



IF(NPTD.EQ.O) NPTD= 1 

IF(C0DE.NE. BLANK) WRITE! 6,6610) N, LBUS,NRTC ,NPTD 
,610 FORMAT ( 1 N LBUS NRTC NPTD 1 / 1 *AI5) 

IF (CODE.NE .BLANK ) WRI TE ( 6, 6669 ) 

,669 FORMAT ( • 0 PT NO ST PT TIME SRT 



TKIDS* ) 



************************************************************************* 



READ SUGGESTED ROUTE - ARRANGED MANUALLY FROM MAP OBSERVATIONS AND 
LMAT AND MLINK MATRIX, IT MUST BE POSSIBLE TO GO FROM ONE POINT 
TO THE ONE FOLLOWING IT 

************************************************************************* 



NCK=0 
LNPT=0 
NRC=0 
N0UT=0 
NTKIDD-0 
MAXM=0 
J-0 
RT=0 
NKD=0 
NPTC=l 
LI NE=0 

****************************************************************** 

NUMBER OF STUDENTS AT 

READ POINT POSSIBLE THIS POINT. LEAVE BLANK IF 

STARTING PTS. SAME AS READ IN AT START 
READ ( 5 , 1 , END=230 ) MPT, NST(NPTC), ( KTYPE ( JL ) , JL=1 , NTYPE ) 

I F (MPT.EQ.9999 ) GO TO 230 

***************** ************ ****************************** ******* 

CALL LOOKUP (MPT ,NPTS, NC ) 

IF (NC-1 ) 135 , 193 , 135 
193 N0UT=1 

GO TO 190 
135 CONTINUE 

NPTC=NPTCGl 
195 LNPT=LNPT Cl 

IF (NCK) 200, 220, 2 CO 
200 CALL SEARCH (NCK, MPT, J) 

IF ( J ) 210,220,220 

210 WRITE(6,3) MPTN (NCK ) , MPTN (MPT ) 

N0UT=1 
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TABLE 1 CONTINUED 



220 NCK=MPT 

! NSUG ( LNPT ) =MPT 

NSUGWC LNPT ) = MPT 
IF(NSKINPT).EQ.O) GO TO 222 
CALL LOOKUP (NST ( LNPT ) »NPTS»NC ) 

IF(NC.EQ.l) GO TO 193 
222 CONTINUE 
ISUM=0 

DO 2291 JXK=1 f NTYPE 

2291 I SUM= I SUM+KT YPE ( JXK ) 

I F ( I SUM.EQ . 0 ) GO TO 221 
DO 2292 JXK=1, NTYPE 

2292 MTYPE( MPT *JXK)=KTYPE(JXK) 

221 CONTINUE 
NTKIDD=NTKI DDGNKD 
MAXM=MAXMCNTKIDD*J 
CALL AKID(MPT*NKD) 

IF(CODE.EQ. BLANK) GO TO 190 

; NPXX=0 

MPX=NST ( LNPT ) 

IF(MPX.NE.O) NPXX=MPTN ( MPX ) 

IF(NST(1) .EQ.O) NPXX=MPTN( MPT) 

I WRITE (6, 1066) MPTN( MPT ) * NPXX, J ,MAXM, NTK I DD 

|1066 FORMAT ( • *5110) 
j GO TO 190 

i 230 CONTINUE 

| NPTC=LNPT 

IF(NRTC.EQ.l) GO TO 243 

IF ( NTKIDD. LE.NBC (LBUS ) +NOVLD ( LBUS ) ) GO TO 243 
WRITE (6, 242) NBC (LBUS) * NTK IDD*NOVLD( LBUS) 

242 FORMAT ( • 0 BUS IS OVERLOADED ON A GENERATED ROUTE BUS CAPACIT 

1Y IS • 1 5 • TOTAL STUCENTS * 15 ,' OVERLOAD * , 15 ) 

N0UT=1 

243 CONTINUE 

! IF (N0UT-1)237, 232*237 

'232 WRITE ( 6 *4) LBUS 

i IF(NRTC.NE.l) GO TO 161 

i GO TO 3011 

C 

C ** ****** **$*#$$ 4 *$$$$***$*$$* $$***$**£*$*$:(: ♦«*« *«♦*«*:♦♦* *****♦«*«❖ 

I c 

C THIS SECTION OF THE PROGRAM LOADS A BUS AND PRINTS OUT THE ROUTE 

C 

c *********************************************************** *#$*$$* 

c 

237 CONTINUE 

JXY=0 

LNPTS=LNPT-NPTD 
IF(NSTd).NE.O) GO TO 235 
DO 233 J=l* LNPTS 
233 NST ( J)=NSUG( J) 

235 CONTINUE 
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TABLE 1 CONTINUED 



DO 234 J=1 , LNPTS 
IF (NST ( JJ.EQ.O) GO TO 234 
DO 236 K=l, LNPTS 
IF (NSUG(K) .NE.NST(J) ) GO TO 236 
GO TO 239 
236 CONTINUE 

WRITE ( 6* 2239 ) 

2239 FORMAT ( • COULDNT FIND A POINT FROM THE NST MATRIX IN THE NSUG M. • ) 
GO TO 161 

239 NST ( J ) =K 
234 SUBS ( J )= J 

IFtCODE.EQ. BLANK) GO TO 231 
WRITE ( 6* 5) 

231 CONTINUE 
KKX=0 
NBCPVV=0 
K=1 

IFtNBUSM(LBUS).NE.O) MAXM=NBUSM ( LBUS ) 

C 

C DETERMINE IF THIS IS A GENERATED ROUTE OR NOT 
C 

IF (NRTC-1) 207*206*207 

206 NNBUS=NBUS 
MMAXM=0 

GO TO 206 

207 NNBUS=1 

208 CONTINUE 

DO 280 J=1 , NNBUS 
DO 223 J J=1 * NTYPE 
223 KTYPE ( J J )=0 

NBCP=-NBCPVV 
NBCPV=0 
NBCPVV=0 
KK=0 

IF ( NRTC-1 ) 203*202 i 203 

202 LBUS= J 

203 CONTINUE 

240 CALL AKID(NSUG(Kit NKC ) 

CALL BUSV ( LBUS, NBCP*NKD»NBCPV* M ) 

IF(NRTC.NE.l) GO TO 250 
GO TO (250, 256, 260), M 
250 KK=KK61 

IF(KKX.NE.l) GO TO 241 

NKD=NBCXX 

KKX=0 

241 CONTINUE 

NACC (KK)=NSUGIK ) 

MACC (KK)=NKD 

255 K=K£ 1 

IF (K-NPTC) 240,270,270 
C OUTPUT ROUTE 

256 KK=KKG1 



'll 

o 

ERIC 



TABLE 1 CONTINUED 



NA-CC (KK)=NSUG(K) 

MACC (KK ) =NKD-NBCPV 

K=K-1 

KKX= 1 

NBCXX=NBCPV 
GO TO 270 
260 KK=KK61 

NACC ( KK )=N$UG ( K ) 

MACC (KK)=NKD 
270 CONTINUE 
KK—KK+l 

NACC ( KK ) =NSUGW ( NPTC ) 

MACC (KK ) =0 
K = k £ X 

IF(NRTC.EQ.l) CALL PR INT ( LBUS,KK ) 

IF(NRTC.GT.l*AND.JXY*NE.O) CALL PRINT (LBUS»KK) 
MMAXM=MMAXM+MILE 
I F (K-NPTC ) 280,300,300 
! 280 CONTINUE 

300 CONTINUE 

IF(NRTC.EQ.l) GO TO 301 
IF(NRC.GT.NRTC)GO TO 301 
CALL SHIFT ( LNPT S ) 

DO 238 JXXY=1 ,LNPTS 
KL=SUBS ( JXXY ) 

238 NSUG ( JXXY)=NSUGW (KL ) 

! IF(JXY.NE.3) GO TO 231 

I 301 CONTINUE 

! IF(NRTC.NE.l) GO TO 161 

WRITE (6, 128 ) NKID 

i 128 FORMAT ( • 0 TOTAL STUDENTS IN THIS SYSTEM »I8) 

• WRITE (6, 310) LBUS, NTK IDD, MMAXM , RT 

i 310 FORMAT ( *0 TOTAL BUSSES USED M3* TOTAL STUDENTS • 14 1 

1ENT RIDING TIME *18* ROUTE TIME *15) 

I 3011 CONTINUE 

I NTIMT=1 

| IF(RCODE.EQ. BLANK) GO TO 161 

IF(RCODE.ECKLMATX) GO TO 1012 

! WRITE (6,5) 

IF(RCODE.EQ.BUSX) GO TO 9055 
IF(RC0DE*EQ*KIDSX ) GO TO 1011 
GO TO 9011 
302 CONTINUE 

ENDFILE 1 
ENDFILE 2 

C END OF MAIN LINE PROGRAM 

END 
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TABLE 1 CONTINUED 



SUBROUTINE LOOKUP ( K , NPTS ,NC ) 

IMPLICIT INTEGER*2(A-Z) 

INTEGERS NRC, MAXM, MI LE » MMAXM 
INTEGER** ATYPE 

**%*%#* t **************************** Z*************** ********* ******** 

SUBROUTINE TO LOOKUP A POINT IN THE MPTN MATRIX AND ASSIGN IT A 
NUMBER IN NUMERICAL ORDER 

$ $ $ $ *******$$***************** $£$$$$**#** ❖$**** $ 

DIMENSION ATYPE (5) , NBC( 50 ) , MPTN ( 1 50 ) , MTYPE ( 150,5) ,NTKID( 5) , 
1NSUG(150),NACC(52), MACC ( 52 ) , LMAT ( 1500 ) , ML INK ( 1 500) , NML ( 1 50 ) , 
2NRELI150) ,LACC(52),KTYPE(5) ,NBUSM(50) ,NSUGW(150) ,N0VLD(50) , 

3NST (150)»SUBS(150) 

C 

COMMON MRC,MAXM, MI LE»MMAXM 

COMMON MPTN, NTOT,NREL f NSST f MTYPE, KTYPE, NBC, NOVLD.NBCPVV 
COMMON LACC, NACO,MACC 
COMMON NTYPE, NML, NRTC, LINE 
COMMON RT , NBUSM 

COMMON /ABC/LNPTS,JXY,NST, SUBS, NSUGW, LMAT, ML INK 

FORMAT ( 1H 1 5 , 2X , 15HIS NOT IN TABLE) 

FORMAT (15) 

NC=0 

101 DO 100 J=l, NPTS 

I F (MPTN ( J )-K ) 100 , 102 , 100 
100 CONTINUE 

WRITE(6,1) K 
NC=! 

102 K=J 
RETURN 
END 
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TABLE 1 CONTINUED 



SUBROUTINE SEARCH! J, K, L ) 

• IMPLICIT I NTEGER*2 ( A-Z ) 
INTEGERS NRC*MAXM,MILE,MMAXM 
INTEGER** ATYPE 



SUBROUTINE TO SEARCH THE LMAT MATRIX FOR A POINT AND THEN 
GO TO THE MLINK MATRIX AND GET THE TIME REQUIRED TO GO TO THAT POINT 

** $ $*** ******************************************** ****$$*«* ************* 
DIMENSION ATYPE(5),NBC(50),MPTN( 150)*MTYPE( 150,5) ,NTKID(5) , 

1NSUG ( 150 ) »NACC( 52 ) »MACC ( 52 ) *LMAT ( 1500 )* ML INK ( 1500) ,NML ( 150) , 

2NREL ! 150 ) » LACC t 52 ) »KTYPE ( 5 ) » NBUSM ( 50 ) *NSUGVI( 150) ,N0VLD(50) » 

3NSTI 150 ) »SUBS ( 1 50 ) 

C 

COMMON NRC»MAXM t MILE» MMAXM 

COMMON MPTN» NTOT »NREL»NSST* MTYPEt K TYPE* NBC* NOVLDtNBCPVV 
COMMON LACC*NACC*MACC 
COMMON NTYPE »NML* NRTC»LINE 
COMMON RT, NBUSM 

COMMON / ABC/LNPTS* JXY *NST* SUBS *NSUGWi LMAT * MLINK 
C 

l=-i 

JA=NREL(J) 

KA=JALNML! J)-l 
IFCKA.LT. JA) GO TO 102 
DO 100 JL=JA,KA 
IF ( LMAT ( JL)-K)100,101*100 

100 CONTINUE 
GO TO 102 

101 L=MLINK( JL ) 

102 RETURN ", 

END 
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SUBROUTINE AK ID ( K» NKD ) 
IMPLICIT INTEGER*2( A-2 ) 
INTEGER*4 NRC, MAXM, MI LE, MMAXM 
INTEGERS ATYPE 



SUBROUTINE TO TOTAL THE DIFFERENT TYPES OF CHILDREN AT A POINT 

* 44 *$*$$*$$#$*$$ $$$$$$ $$$$ 4 $#$#$#$##$ $$$$$* ****** ###$##$#$##$####$#######• 

DIMENSION AT YPE ( 5 ) , NBC ( 50 ) » MPTN ( 150 ) , MTYPEI 150,5 ) ,NTKID( 5 ) , 
1NSUG(150),NACC(52),MACC(52) ,LMAT ( 1500 ) , ML I NK ( 1 500 ) ,NML(150) , 

2NREL( 150) ,LACC(52),KTYPE(5) ,NBUSM(50) , NSUGW ( 150 ) , NOVLD ( 50 ) , 
3NST(150),SUBS(150) 

COMMON NRCtMAXM, MILE, MMAXM 

COMMCN MPTN, NTOT,NREL,NSST,MTYPE, KTYPE, NBC, NOVLD, NBCPVV 
COMMON LACC ,NACC , MACC 
COMMON NTYPE,NML,NRTC,LINE 
COMMON RT ,NBUSM 

COMMON /ABC/LNPTS, JXY,NST, SUBS, NSUGW, LMAT, ML INK 
NKD=0 

DO 100 JA=1 ,NTYPE 
NNN=MTYPE(K, JA) 

KTYPE ( JA)=KTYPE ( JA) CNNN 
00 NKD S NKD£NNN 
RETURN 
END 
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TABLE 1 CONTINUED 






200 

102 



103 

100 

203 



SUBROUTINE BUSV ( J ,NBCP, NKD, NBCPV , M ) 

IMPLICIT INTEGER*2( A-Z ) 

INTEGERS NRC»MAXM» MILE»MMAXM 
INTEGERS ATYPE 

SUBROUTINE TO LOAD THE CHILDREN AT A POINT ON A BUS 

$*$$*$ **$*♦# #$*$$**$**# **•❖*$♦♦#$#*♦♦#$**#*$♦** ^’ fr ****** 55 ** 5 ***** fc ###* 5 
DIMENSION ATYPE ( 5 ) » NBC ( 50 ) » MPTN ( 150) »MTYPE ( 150,5) ,NTKID(5), 

1NSUG ( 150 ) , NACC ( 52 ) » MACC (52)»LMAT(1500)fMLINK(1500)»NML(150) , 
2NREL(150)»LACC(52)* KTYPEt 5)»NBUSM(50) , NSUGW ( 1 50) » NOVLDt 50) , 

3NST ( 150 ) » SUBS ( 150 ) 

COMMON NRC, MAXM,MILE, MMAXM 

COMMON MPTN, NTOT.NREL, NSST, MTYPE ,KTYPE, NBC ,NOVLD , NBCPVV 
COMMON LACC, NACC, MACC 
COMMON NTYPE, NML ,NRTC,L INE 
COMMON RT , NBUSM 

COMMON / ABC/LNPTS, JXY,NST , SUBS,NSUGW, LMAT , ML INK 
M=1 

IF(NBCP£NKD-NBC( J) ) 100, 103,200 
IF (NBCPCNKD- (NBC t J) GNOVLDt J ) ) )103,103,102 
NBCPV=NBCPCNKD- ( NBC ( J ) GNOVLD ( J ) ) 

NBCPVV=NKD-NBCPV 
NBCP=NBC ( J ) GNOVLD ( J ) 

M=2 

GO TO 203 
M=3 

NBCP=NBCPGNKD 

RETURN 

END 
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160 

100 

111 

112 
50 

75 



1175 

1176 

175 

150 



SUBROUTINE SHIFT(NPTS) 

IMPLICIT INTEGERS (A-Z) 

DIMENSION NC ( 150 ) _ _ . 

DIMENSION NST ( 150) * SUBSl 150) » NSUGW ( 150) » LMAT ( 1 ^00 ) » ML INK ( 1500) 
COMMON/ ABC/ LNPTS* JXY , NST f SUBS* NSUGW » LMAT* ML Ii\.C 
J=NPTS 

IF(JXY.EQ.l) GO TO 111 
JXY= 1 



NSTT=0 

NSTT=NSTT+1 

IF(NSTT.GT.NPTS)GO TO 150 
SUBS ( 1 )-NST (NSTT ) 

DO 100 K-l* NPTS 
NC ( K )=0 
NC(SUBS( 1) )-l 



J=1 

GO TO 75 
J=J-1 

IF(J.LE.l) GO TO 160 

DO 112 K= J*NPTS 

NC ( SUBS IK) )=0 

SUBS (J)=SUBS(J)+1 

IFtSUBSt JJ.GT.NPTS) GO TO 111 

IF (NCI SUBS t J) ) *NE*0) GO TO 50 

CALL SEARCH ( NSUGW ( SUBS ( J-l) ) » NSUGW ( SUBSt J ) ) t ICK) 
IF(ICK.LT.O) GO TO 50 
NC (SUBS ( J ) )=1 
CONTINUE 



JJ=J 

DO 175 K=1 * NPTS 
IF(NCtK).NE.O) GO TO 175 
NC(K )=1 
JJ=JJ+1 
SUBS ( J J )=K 

CALL SEARCH ( NSUGW ( SUBS (J J“l) ) * NSUGW ( SUBS( JJ) ) » ICK) 

IF(ICK.GT.O) GO TO 175 

DO 1175 JK=1*NPTS 

NC ( JK) =0 

J=JJ-1 

DO 1176 JK= 1*J 
NCtSUBSt JK) )=i 



J=JJ 

GO TO 50 

CONTINUE 

RETURN 

CONTINUE 

JXY=3 

RETURN 

END 
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SUBROUTINE PRINT (NJ,KK) 

IMPLICIT INTEGERS ( A-Z ) 

INTEGER*^ NRC,MAXM,MILE,MMAXM 

SUBROUTINE TO PRINT A BUS ROUTE 

*«***.«***«*««*M**M«****«*««****«*«************************* 

niKFNSirN ATYPE(5>,NBC(50>,MPTNtl30),MTYPE(150,5),NTKIDl5), 

,?,Jnr^icn» wlrf [*?) MACCI 52), LMAT( 1500). MLINM 1500) .NMLU50), 

3NST( 150) ,SUBS( 150) 



N^NTOTfNREL»NSSTf MTYPEfKTYPE tNBCtNOVLD tNBCPVV 

X • NACC • MACC 



COMMON 

COMMON MPTN,.y.^. 

COMMON LACC» NACC * MACC 
COMMON NTYPE »NML»NRTC»LINE 

f>niiiinki nr mdiiCM 



COMMON /ABC/LNPTS, JXY ,NST » SUBS»NSUGW» LMAT » ML INK 



FIND » 1 5 » 3H TO, 15) 



FORMAT ( 1H026 15 ) 

FORMAT 1 1H 2615) 

FORMAT tlH ) 

FORMAT UH 11HCANN0T 
NRC=NRCC1 
MI LE=0 
NRT=0 

NTKD=MACC( 1) 

DO ICO J=2,KK 

CALL SEARCH ( NACC (J“l) ,NACC(J),L) 

IF (L )201, 202 , 202 
CONTINUE 

IFtNRTC.NE. 1 ) GO TO 102 

WRITE (6,5) MPTN( NACC ( J-l ) )t MPTN ( NACC ( J ) ) 

GO TO 102 

CONTINUE 

LACC ( J )=L 

MILE-MI LE£NTKD*L 

IFtMRTC.EQ.l) GO TO 101 

I F (MI LE-MAXM) 101,101,102 

nrt=nrtcl 

RT=RT+L 

NTKD=NTKD£MACC ( J ) 

NSSTT=NSST-NSST/100«40 
NL=NSSTT-NRT 
LACC(1)=NL/60*A0GNL 
DO 200 J=2,KK 
NL=NLCLACC( J) 

LACC ( J ) =NL/60*40£NL 

FORMAn'OBUS NO. M3- NUMBER OF STUDENTS M4- 
1TUDENT RIDING TIME M8* GENERATION NO. 15) 



ROUTE TIME 1 IV 
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TABLE l CONTINUED 



2 FORMAT ( • BUS NO. M3 1 NUMBER OF STUDENTS ‘14* 
1TUDENT RIDING TIME 'I8» GENERATION NO. *15) 
KX=KK/26+l 

WRITE! 2, 2222) N J, NTKD *NRT *M ILE , NRC 

222 FORMAT ( 3A2, 2A4 ) 

WRITE (2 , 2223 ) MACC, NACC, L ACC 

223 FORMAT ( 40A2) 

DO 300 JX=1 * KX 
JXX=JX*2 5-25+1 

JYY=l/JX*(KK-KK/25*KK+KK/25*25)+JX/2*KK 
WRITE (6, 33) (MACC( J) , J=JXX,JYY) 

WRITE (6 *3) ( MPTN ( NACC ( J ) ) ,J=JXX, JYY) 

WRITE (6*3 ) (LACC(J) ,J=JXX*JYY) 

WRITE (6,22 )NJ»NTKD*NRT, MILE, NRC 
WRITE(6,4) 

LINE=LINE+1 

IF(LINE.NE.IO) GC TO 300 

LINE=0 

WRITE(6,10) 

0 FORMAT ( • 1 • ) 

00 CONTINUE 

* * $ $ $ # $ # % if. if $ $ # $ $ $ $ $ 4 4 $ $ # $ jfr $ * £ £ $ # * # # $ $ :{: $ Jj{ # $ a{s ajc $ $ <c £ # 

ZERO MACC NACC , AND LACC 

02 DO 700 1=1,52 
MACC ( I ) =0 
NACCU )=0 
00 LACC ( I ) =0 
RETURN 
END 
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CONCLUSIONS 



t 



The purpose of this Final Report was to present a FORTRAN 
computer program that can be used to design school bus routes. 

Some of the more general conclusions of this study are 
as follows: 

1. A heuristic solution to the school bus routing problem 
seems to be a satisfactory one at this time. 

2. Many field tests of the computer program indicate that 
school bus routes can be designed that are as short or shorter 
than routes designed by hand. Therefore, the computer technique 
may offer a greater saving of time than financial savings for 
transportation directors. 

3. Because the amount of computer time required to design 
routes will vary according to school district, no time estimates 
will be given. 

It is absolutely necessary for anyone planning to use 
the school bus routine program to secure a copy of the User’s 
Manual presented in Appendix A. This manual must be studied 
very carefully, and based on recommendations of current users 
of the program, the prospective user may find it necessary to 
contact the director to discuss in detail the manual, preparation 
of input data, and the actual FORTRAN program. 

5. The program presented seems to be a very useful 
tool in designing of school bus routes; but as in any new 
development, some difficulties will be encountered in the 
initial use of the program. After one or two small areas of 
a school system have been computerized, complete change over 
from manual to computer routing should be easier, relatively 
simple, and a straightforward procedure. 

6. The present computer program is being revised 
constantly, and any person contemplating the use of it 
should contact the Director if he wants the benefit of 
the latest development. 
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SECTION A 



INTRODUCTION 

The School Bus Routing Program was developed by the 
University of Mississippi, to aid transportation directors 
to design efficient school bus routes. 

This manual is a guide for the preparation of data 
to be used in the program. The topics discussed include: 
collecting data, procedures to be used in suggesting rout 
and preparing different combinations of the suggested 



routes . 
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SECTION B 

COLLECTION OF INITIAL DATA 

Three types of data are required in the school bus computer 
program: stop numbers, the "KIDS Matrix," and the "LMAT-MLINK 

Matrix." Each of these types of. data is described in the 
following paragraphs: 

1. Stop Numbers 

Each stop or pick up point in the school system must 
be assigned a stop number. The location of each stop may 
be described in terms of street addresses or local land- 
marks. The school site is also assigned a stop number. 

(See Table 1 for a sample list of stop numbers and 
addresses . ) 

2. KIDS Matrix 

The KIDS Matrix is a list of stop numbers and the number 
of students at each stop. For example, if there are two 
elementary students, one junior high student, and five 
senior high students at stop number 100, the Kids Matrix 
entry would be the following: 

100 2 1 5 

When a bus is being loaded, the number of students loaded 
depends on the number of students specified in the Kids Matrix 
(See Table 2 for sample KIDS Matrix.) 
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(p (|> r * H * 1 

Ol'~ 13418 7 1/2 iil LE RD 

02 13324 7 1/2 MILE RO 

,03 13032 7 1/2 MILE RD 

04 12502 7 1/2 MILE RD 

05 12400 7 1/2 MILE RD 

06 12006 7 1/2 MILE RD 

07 HUY 38 + 7 1/2 MILE RO 

08 8049 HUY 41 

09 7 MILE RD + HAGEMANN RD 

10 12813 7 MILE RD 

11 12329 7 MILE RD 

12 8123 HY 38 

13 10207 7 MILE RD 

14 9807 7 MILE RD 

15 9326 7 MI RD + NICHOLS OH RD 

16 8510 7 MILE RD 

17 7920 7 MILE RD 

18 13410 6 1/2 MILE RD 

19 13116 6 1/2 MILE RD 

20 12926 6 1/2 MILE RD 

21 12500 6 1/2 MILE RD 

22 7600 HUY V 

23 11026 6 1/2 MILE RD 

24 7153 HUY 41 

25 6601 HUY V 

26 11933 HY G 

27 11001 HUY G 

28 10612 HUY G 

29 13500 BELL RD 

30 13131 HELL KD 

31 8348 HY 38 

32 HUY 38 AND FC REST HILL RD 

,33 6237 HY H 

i 34 5955 HUY V 

35 5544 HUY V 

36 8645 EAU GALLE RD 

37 7826 HUY V 

38 6205 HUY V 

39 8405 NICHOLSON RD 

40 CADDY VISTA SCHOOL 



Stop Numbers and Addresses 

1. Stop Numbers 

2. Addresses 
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Sample KIDS Matrix 

1. Point number 

2. Number of Elementary, Junior High 

and Senior High students at each point 
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3. LMAT and MLINK Matrix 

The LMAT and MLINK matrix is used to provide the school 
bus routing program with information concerned with traveling 
from one point to another point. For every point in the school 
system the LMAT matrix provides a list of the points to which 
a bus can go if it is at any given -point. The MLINK matrix 
provides a list of the times required to travel between the points 
given in the LMAT matrix. When the LMAT and MLINK matrix is 
prepared, all possible points to which a bus can go from each 
point in the school system should be included; and the time 
between points should be as accurate as possible. The reasons for 
the former statement are: (1) When routes are being generated, 

a route is abondoned when it is not possible for a bus to travel 
from one point to another according to the LMAT matrix, and 
(2) Variations in the time required to travel between points 
could cause a poor bus route to have a short route time or 
cause a good bus route to have a long route time. Using the map in 
Figure 1 and the LMAT and MLINK matrix in Table 3> it can be seen 1 

that from point 1 a bus can travel to points 2,8,10, and 40. However, 
a bus cannot travel to points 3>^>5>6 etc., using the data given in 
LMAT and MLINK matrix. 
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Figure 1. Map from Unified School District. Number 1, 
Racine, Wisconsin. 
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Sample LMAT and MLINK Matrix 






10 02 



40 1 5 

17 15 40 
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1. Beginning Point number 

2. Point to which a bus can travel from the beginning point 

3. Time required to travel from the beginning point to the 
corresponding point with a column header of 2 
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SECTION C 
SUGGESTED ROUTES 

- Once the initial data has been collected, a manually arranged 
Dute must be prepared. This route is prepared by designing a bus 
Dute that passes every point in the school system as though only one 
as would be used to transport all of the students in the system. When 
lis route is used as input data, the program divides the route into 
everal smaller routes using the bus capacities specified in the input 
ata for the program. By varying the order of the busses, if all the 
Usses are not the same capacity, different sets of routes can be 
Fepared. These suggested routes are then input for generating routes, 
hich will be discussed later. 

In the following paragraphs the input data and output data associated 
p.th suggesting routes is discussed-. The input data is presented in 
^ie order in which it is read by the computer, 
j 1 . Specifying the Types of Students 

The first input card specifies the number of types of 
f students in the school system and the abbreviated name for 

I 

each type of student (see Table 4 for sample input card). 

2 . Bus Capacities 

The second set of data consists of the bus numbers, their 
capacities, the maximum student riding time for each bus, and 
the overload for each bus. The capacity of the bus plus the 
overload is used in determining where one bus route ends and 
another begins. If the overload is left blank or is 0, no 
overload is assumed for the bus. 
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If the maximum student riding time if left blank, it 
is assumed to be the route time computed from the first 
route. The route will be terminated when the maximum 
student riding time is reached, even though the bus is 
not completely filled. (See table 5 for sample bus 
capacities) 

3. KIDS Matrix 

See "KIDS Matrix" on page *1 . 

4. LMAT and MLINK Matrix 

See "LMAT and MLINK Matrix" on page 7. 

5. Manually Arranged Route 

(a ) Header lard 

The header card for the manually arranged route 
contains the school point number, the number of busses 
to be used, and the number of generations to be 
considered. For manual routes, the number of 
generations to be considered is always one. (See 
table 6 for a sample header card) 

(b) Points in the Suggested Route 

Each header card is followed by a manually 
arranged set of stop numbers. The manually 
arranged route is discussed in the opening 

paragraph of this section. (See table 6 for a 
sample route) 

6* Suggested Route Output 

- 

The manually arranged route is divided into several smaller 
suggested routes using the busses provided and these suggested 
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routes are printed. The output consists of the number 
of students loaded at each point, the point numbers, the 
arrival time of the bus at each point, the bus number, the 
number of students riding the bus, the route time, the student 
riding time, and the generation number. For a suggested route, 
the generation: number is irrelevant (See Table 7 for sample 
output from suggesting routes). 

After the suggested routes have been printed, each route 
must be checked for logical ending points and split points. 
Decisions then have to be made about what changes must be made 
in the suggested routes. By looking at the routes in Table 7» 
one can see that points 8 and 3^ have been split. By increasing 
the capacity of bus number 1 to 67 and decreasing the capacity 
of bus number 2 to 65 , all of the students at point number 8 
can be transported by bus number 1. All of the students at point 
number 3^ can be transported by bus number 3 by decreasing the 
capacity of bus number 2 to 58 and increasing the capacity of 
bus number 3 to 63* The changes required to prepare generated 

1 

routes from the suggested routes in Table 7 are are summarized 
in Table 8. 
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Sample Input for Specifying the Types of Students 

1. Number of types of students in school system 

2. Four letter abbreviated name for. each type 
of student 



Table 5 




Sample Bus Capacities 

1. Bus number 

2. Bus capacity 

3. Maximum student riding time 

4. Overload 
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Table 6 

® d)(D 

40 03 01 

31 

07 • 

06 

03 

© “ 

03 

02 

01 

08 

09 

10 
11 

37 
22 
21 
20 
19 
18 

24 

29 

30 
35 
34 

38 

25 

26 

27 
33 

28 
23 
32 
12 

13 

14 

15 

39 

16 
17 

40 

Manually Arranged Route 

1. School point 

2. Number of buses 

3. Number of generations (always 1 for manual routes) 
Points in the suggested route 
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SECTION D 
GENERATED ROUTES 

The final phase of preparing school bus routes is generating 
all possible combinations of the suggested routes prepared in the 
previous step. This phase consists of trying N combinations of 
the suggested route, checking each combination for errors caused 
by not being able to go from one point to the next in the route, 
and printing all routes which have no errors and a route time 
less than or equal to the original route time. 

In the following paragraphs, the input and output associated 

with preparing generated routes is discussed. 

1. Follow procedures 1-4 for preparing suggested routes. 



2 . Generated Route Input 

(a) Header Card 

The header card consists of the school point number, * 
the bus number and the number of generations to be 
considered. (See Table 9 for a sample header card.) 

(b) Suggested Route Prepared by Program 

.Each header card is followed by one of the suggested 
routes prepared earlier. Each suggested route consists 
of the points in the bus route and the points which 
are to be considered as starting points. If no starting 
points are given, all of the points except the last in 
the suggested route are used as starting points. (See 
Table 9 for sample data for generating routes.) 

o 
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3. Generated Route Output 

For each generation which meets the conditions stated in 
the opening paragraph of this section, the number of students 
loaded at each point, the point numbers in the route, the arrival 
time of the bus at each route, the bus number, the number of 
students on the bus, the route time, the student riding time, 
and the generation number are printed and also stored on a 
sequential file on tape or disk. (See Table 10 for a sample 
generated route.) 

After this phase is complete, the program described in Section E 
can be used to print selected generations of the routes in a more 
usable form. 

! 
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Table 9 



®<D© 



© 



© 




40 01 200 



►9999 



40 02 200 

08 

09 ' 

10 
11 
37 
22 
21 
20 
19 



Sample Data for Generating Routes 

1. School number 

2. Bus number 

3. Number of generations to be considered 
Points in the suggested route 

5. Trailer card 
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Page 19 



SECTION E 

PRINTED SELECTED GENERATED ROUTES 

The procedures described in this section present a way of print- 
ing selected generated routes in table form using the data stored on 
files 1 and 2 after the routes have been generated. Since this 
procedure does not generate routes and output must be consistant with 
local forms, the program is really a ’’bookkeeping" procedure rather 
than a research methodology. The printouts in the User’s Manual are 
for illustrative purposes only. 

The card input is presented in the following paragraphs in the 
order in which it may be read by the computer. 

1 . Number of Copies of Each Route . 

The first input card specifies the number of copies of 
each route to be printed. The number of copies is right 
justified in the first 5 columns of the card. 

2 . Bus Capacities . 

For each bus used in the system, there is a card with the 
bus number and the capacity of the bus . The capacity of the 
bus should be the number of students the bus was designed 
to hold, not trie number of students riding the bus. 

(See Table 11 for a sample set of bus capacities.) 

3 . Header Cards . 

The header cards contain the information that is printed 
at the beginning of each bus route. (See Table 12 for a 
sample set of header cards.) 




A . Stop Numbers and Address es . 

See "Stop Numbers" on page 2. 
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5 . Genera tions to be Printed . 

The final set of data contains the information required to 
select the generations of each route that are to be printed. 

The data consists of bus number, the school starting time, the 
school dismissal time, school arrival time, school leaving time, 
and the numbers of the generations’ to be printed. A maximum of ten 
generation numbers can appear on a card. (See Table 13 for a sample 
set of data. ) 

The output from the program consists of the following: the 

headers used as input, the route number, the generation number, the 
route time, the number of students transported, the bus capacity, the 
student riding time, the school starting time, the school dismissal 
time, the school arrival time time, the school leaving time, the stops 
on the route and their addresses, the arrival time of the bus at 
each stop in the morning and afternoon, and the number of each type 
of student at each stop. (See Table 14 for a sample route.) 



o 
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Table 11 




02 66 
03 66 



Sample Bus Numbers and Capacities 
for Printing Selected Generated Routes 



Table 12 



SCHOOL BUS ROUTING FOR 

THE BOARD OF PUBLIC INSTRUCTION OF RACINE, WISCONSIN 

BY THE UNIVERSITY OF MISSISSIPPI 

CADDY VISTA SCHOOL (8.00 SESSION) 

RACINE , WISCONSIN 



Sample ‘ Header Cards 



Table 13 




01 0800 0300 0750 0305 09 

02 0800 0300 0750 0305 02 

03 0800 0300 0750 0305 10 



Sample Data for Selecting Generations to be Printed 

1. Bus number 

2. School starting time 

3. School ending time 
School arrival time 

5* School leaving time 

6. Generation numbers to be printed (10 generation numbers 
can be on one card). 
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Table 1*1 



SCHOOL BUS ROUTING FOR 

THE BOARD OF PUBLIC INSTRUCTION OF RAC I NE* WISCONSIN 

BY THE UNIVERSITY OF MISSISSIPPI 



CADDY VISTA SCHOOL (8.00 SESSION )_ 
RACINE , “WISCONSIN 



JUS NUMBER 

10UTE NUMBER 1 

40. TRANSPORTED 67 

>CHOOL STARTING TIME 
SCHOOL ARRIVAL TIME 



DRIVER 

GENERATION 9_ ROUTE. TIME 18. 

BUS CAP. 66 STUDENT TIME 775 

8.00 A.M. _ _ SCHOOL DISMISSAL TIME 3.00. P.M. 

7.50 A.M. SCHOOL LEAVING TIME 3.05 P.M. 
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1 

2 

3. 

4 
36 

5 

6 
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NO. 
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TIME.... 
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80A9 HWY A1 


7 • 32 .„ 
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7 


13418 7 1/2 MILE RD 
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6 


1332A 7 1/2 MILE RD 


7.36 


3.19 


5 


13032 7 1/2 MILE RD 


7.37 


3.18 .. 


8 


12502 7 1/2 MILE RD 


7.38 


3.17 


10 


86A5 EAU GALLE RD 


7. AO 


3.15 


15 


12A00 7 1/2 MILE RD 


7.A1 


3.14 


2 


12006 7 1/2 MILE RD 


7.42 


3.13 


10 


HWY 38 £ 7 1/2 MILE RD 


7.45 


3.10 


1 


83A8 HY 38 


7.46 


3.09 


3 


CADDY VISTA SCHOOL 


7.50 


3.05 
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SECTION P 

SAMPLE DATA p'OR A SCHOOL SYSTEM 

This section contains a complete set of data for preparing 
school bus routes for Racine, Wisconsin,. 

Pages 20-22 contain a list of all the data required to 
produce the suggested routes on page 23 . Page 2k contains the 
suggested routes with the changes required to generate routes. 

The data required to generate the routes is listed on pages 25-27, 
and the generated routes are listed on pages 28-30. 

The data listed on page 35 is used to print the routes on pages 
36-38 using the information about the generated routes on pages 27 - 29 . 

All input data is punched using 5 digit fields and the numbers 

are right justified in these fields . The first header card is the 

only exception and is punched as follows: 

Field 1 — Right justified in 5 digit field. 

Field 2, 3* k 9 etc. — Centered in k column field with 

1 blank between each field. 
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001 


19 


006 


20 


001 


21 


002 


22 


005 


23 


001. 
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003 


32 


003 


33 


002 


34 


015 


35 


009 


36 


015 


37 


004 


38 


003 


39_ . 
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03 
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07 
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14 
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02 
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03 
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9999 




01 


006 


02 


005 


03 


008 


04 


010 


03 


002 


06 


010 


07 


001 


08 


007 


09 


018 


10 


001 


11 


004 


12 


002 


13 
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004 


15 


001. 


16 


007 


17 


003 


18 


C01 
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20 


001 


21 


002 


22 


005 


23 
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24 
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25 


002 
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005 
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28 


003 


29 
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30 
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31 


003 


32 
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33 
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34 


015 


35 
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004 
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39 
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02 


01 


08 


03 


40 
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10 


05 
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01 


01 


03 


01 
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01 


04 


01 
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09 
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05 


01 


40 
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36 


02 
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01 
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01 
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01 


11 


02 


40 


06 


05 . 


01 


07 


03 


40 


06 


36 


02 




07 


06 


03 


31 


01 


13 


03 


40 


03 




07 


36 


05 










.. 






08 


01 


03 


09 


01 


18 


02 


40 


14 
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08 


01 


10 


01 


40 


12 














10 


09 


01 


11 


02 


40 


11 


01 


05 


18 


04 






11 


10 


02 


12 


04 


37 


01 


05 


02 


40 


09 






11 


31 


05 






















12 


11 


04 


13 


01 


31 


01 


32 


0 f 


40 


05 






13 


12 


01 


14 


01 


40 


06 


23 


05 


07 


03 






13 


31 


02 






















14 


13 


01 


15 


02 


40 


07 


39 


03 . 


. 17 


04 






15 


14 


02 


39 


01 


16 


02 


40 


05 










16 


15 


02 


17 


01 


40 


07 


. .39 


03... 










17 


16 


01 


15 


03 


40 


08 














18 


08 


02 


19 


01 


24 


01 


40 .. 


16 


10 


04 






19 


18 


01 


20 


01 


40 


17 
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20 


19 


01 


21 


01 


40 


13 














21 


20 


01 


22 


01 


40 


12 


37 
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22 


21 


01 
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01 


23 
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03 






24 


10 


05 
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07 
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01 
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13 
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33 
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23 


06 


15 


10 


17 
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24 


07 
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23 
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01 
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39 


15 


01 
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04 


14 


03 
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03 
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INPUT FOR PRINTING SELECTED GENERATIONS 



01 




01 


66 


02 


66 


03 


66 


9999 





rue d <"« a r> r\ SCHOOL BUS ROUTING FOR 

° ° CF D v U ?hc C INSTRUCTI °N OF RACINE, WISCONSIN 

BY THE UNIVERSITY OF MISSISSIPPI 

CADDY VISTA SCHOOL (8.00 SESSION) 



I 


13418 7 1/2 MILE RD 


2 


13324 7 1/2 MILE RD 


3 


13032 7 1/2 MILE RC 


4 


12502 7 1/2 MILE RC 


5 


12400 7 1/2 MILE RD 


6 


12006 7 1/2 MILE RD 


07 


HWY 38 C 7 1/2 MILE R 


8 


8049 HWY 41 


09 


7 MILE RD C HAGEMANN 1 


10 


12813 7 MILE RD 


11 


12329 7 MILE RD 


12 


8123 HY 38 


13 


10207 7 MILE RD 


14 


9807 7 MILE RD 


15 


9326 7 MI RD G NICHOL! 


16 


8510 7 MILE RD 


17 


7920 7 MILE RD 


18 


13410 6 1/2 MILE RD 


19 


13116 6 1/2 MILE RC 


20 


12926 6 1/2 MILE RC 


21 


12500 6 1/2 MILE RD 


22 


7600 HWY V 


23 


11026 6 1/2 MILE RD 


24 


7153 HWY 41 


25 


6601 HWY V 


26 


11933 HY G 


27 


11001 HWY G 


28 


10612 HWY G 


29 


13500 BELL RD 


30 


13131 BELL RD 


31 


8348 HY 38 


32 


HWY 38 AND FOREST HILL 


33 


6237 HY H 


34 


5955 HWY V 


35 


5544 HWY V 


36 


8645 EAU GALLE RC 


37 


7826 HWY V 


38 


6205 HWY V 


39 


8405 NICHOLSON RD 


40 

9999 


CADDY VISTA SCHOOL 


01 0800 0300 0750 0305 09 


02 0800 0300 0750 0305 02 


03 0800 0300 0750 0305 10 

9999 



RD 



RD 
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BUS ROUTE 1 — GENERATION 9 



SCHOOL BUS ROUTING FOR 

THE BOARD~OF PUBLIC INSTRUCTION OF RACINE, WISCONSIN 
BY TH E UN IV ERSITY OF MISSIS SIPPI 



CADDY VISTA SCHOOL (8.00 SESSION) 
RACINE WISCONSIN 



US NUMBER DRIVER 

OUTE NUMBER 1 GENERATION ? R0U1E__TIME 18„._ 

G. TRANSPORTED 67 BUS CAP. 66 STUDENT TIME 775 

CHOO L__S J ART I NG_ T..I_ME 8.00 A.M. ; S CH 0 0_L JJ_SJMI SS A_L_T_I_ME 3>00_P.M._ 

iCHOOL ARRIVAL TIME 7.50 A.M. SCHOOL LEAVING TIME 3.05 P.M. 



POINT 


ADDRESS 


A.M. 


P.M. 


NO. 


OF STUDENTS 




ARRIVAL 


TIME 


ELEM 


JR SR 


8 


80A9 HWY A1 


7_.32_ 


3.23 


7 




1 


13A18 7 1/2 MILE RD 


7.35 


3.20 


6 




2 


13324 7 1/2 MILE RD 


7.36 


3.19 


5 




, 


13032 7 1/2 MILE RD 


7.37 


3.18 


8 




A 


12502 7 1/2 MILE RD 


7.38 


3.17 


10 




36 


86A5 EAU GALLE RD 


7. AO 


3.15 


15 




5 


12400 7 1/2 MILE RD 


7.A1 


3.1A 


2 




6 


12006 7 1/2 MILE RD 


7.42 


3.13 


10 




7 


HWY 38 C 7 1/2 MILE RD 


7.A5 


3.10 


1 




31 


83A8 HY 38 


7.46 


3.09 


3 




AO 


CADDY VISTA SCHOOL 


7.50 


3.05 







o 

ERIC 

^ — - 
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BUS ROUTE 2 — GENERATION 2 



SCHOOL BUS ROUTING FOR 

THE BOARD OF PUBLIC INSTRUCTION OF RACINE, WISCONSIN 

BY THE UNIVERSITY OF MISSISSIPPI 

CADDY VISTA SCHOOL (8.00 SESSION) 

RACINE , WISCONSIN 



BUS NUMBER ----- " " DRIVER 

ROUTE NUMBER 2 . GENERATION 2 ROUTE .TIME. 33 . 

NO. TRANSPORTED 58 BUS CAP*. 66 STUDENT TIME 1129 

.SCHOOL STARTING TIME 8.00 A.M. SCHOOL DISMISSAL TIME..„ 3.00 P.M. 

SCHCOL ARRIVAL TIME 7.50 A.M. SCHOOL LEAVING TIME 3.05 P.M. 



POINT ADDRESS A.M. P.M. NO. OF STUDENTS 

ARRIVAL TIME EL EM JR„ SR_ 



.35 . 5544_HWY V 7. 17 3.38 . .9 ... 

. 30 13131 BELL RD .. 7.19 3.36 1 „ 

.29 13500 BELL RD 7.21 .3.34 5 

24 . 7153 HWY 41 7.28 3.27_ 1 

18 13410 6 1/2 MILE RD 7.29 3.26 1 

19 .13116 6 1/2 MILE RD 7.30 3.25 _6_ 

20 12926 6 1/2 MI LE RD 7.31 3.24 1. 

21 12500 6 1/2 MILE RD 7 .3 2 3.. 2 3 2 

22 7600 HWY V 7.33 3.22 5 

37 7826 HWY V 7.34 3.21 4 

11 12329 7 MILE RD 7.35 3.20 4 

10 12813 7 MILE RD 7.37 3.18 1 



9 7 MiLE RD G HAGEMANN RD 7.38 3.17 18 

40 CADDY VISTA SCHOOL 7.50 3.05 
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1 



BUS ROUTE 3 ; — GENERATION 10 
SCHOOL BUS ROUTING FOR 

THE BOARD OF PUBLIC INSTRUCTION" "OF RAClNEt WISCONSIN 

BY_ THE UNIVERSITY' OF MISSISSIPPI 



_ CADDY_ VISTA SCHOOL ( 8. 00_SESSI ONJ 

RACINE , WISCONSIN 

S S NUMBER ----- DR I V E R — - - - - - — — - 

UTE NUMBER _ 3 GENERATION 10 ROUTE TIME _ __32 

• TRANSPORTED 63 BUS CAP, 66 STUDENT TIME 1279 

;HOOL STARTING TIME _8.00 A.M. SCHOOL DISMISSAL TIME 3,00 P,M. 

;HOOL ARRIVAL TIME 7.50 A.M. SCHOOL LEAVING TIME 3.05 P.M. 



POINT 




ADDRESS 


A.M. 


P.M. 


NO. OF STUDENTS 










ARRIVAL 


TIME 


ELEM JR SR 


_ 34 


5955 


HWY V 




7.18 


3. 37 


15 


38 


6205 


HWY V 




7.19 


3.36 


3 


25 


6601 


HWY V 




7.20 


3.35 


2 ______ _ _ 


26 


11933 


HY G 




7.21 


3.34 


5 


27 


11001 


HWY G 




7.22 

*’¥ ‘ - ‘ 


3.33 


1 


33 


6237 


HY H 




7.25 


3.30 


2 


28 


10612 


HWY G 




7.26 


3.29 


3 


23 


1 1026 


6 1/2 


MILE RD 


7.32 


3.23 


1 


32 


HWY 38 AND FOREST HILL R 


7. 


3.20 


3 


12 


8123 


HY 38 




7.36 


3.19 


2 


13 


10207 


7 MILE 


RD 


7.37 


3.18 


10 


14 


9807 


7 MILE 


RD 


7.38 


3.17 


4 


17 


7920 


7 MILE 


RD 


7.42 


3.13 


3 


16 


8510 


7 MILE 


RD 


7.43 


3.12 


7 


15 


9326 


7 MI RD 


C NICHOLSON 


7.45 


3.10 


1 


39 


8405 


NICHOLSON RD 


7.46 


3.09 


1 


40 


CADDY 


VISTA 


SCHOOL 


7.50 


3.05 




| ERIC 


















I 




t 
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SECTION G 

DATA SET REQUIREMENTS FOR SCHOOL BUS ROUTING PROGRAM 

; The School Bus Routing Program uses two sequential data sets, 

\ 

which are composed of 80 byte records. The data sets are referenced 
with data set reference numbers 1 and 2. 

The number of records in the data set with DSRN 1 is 

Number of Records = 2 + [ (NBC+MPTN+NREL+MTYPE) . *2] /80 
where NBC, MPTN, NREL, and MTYPE are the number of entries in the 
arrays with corresponding names in the program. If the variah^s 

were dimensioned in the following statement, the number of recorus 
required would be 29 . 

DIMENSION NB C ( 5 0 ) , MPTN(150), MREL(150), MTYPE( 150,5) 

| The number of records in the data set with DSRN 2 is variable. 

I 

i 

| For each bus route printed, five records are required. Therefore, the 
, number of records needed is 

Number of Records = 5 * N 

i 

i where N is the number of busses for suggested routes and sum of the 
1 number of generation printed for each bus route for generated routes. 

; For example, 1000 records would allow for 200 generated routes. 

When suggested routes are being prepared, the data sets can be 
dummied, since the data from suggested routes is never used. 

If it is not necessary to keep the data stored on data sets 
! l.and 2, cards 17^> 175> 6^5 3 6^7 can be removed from the deck 
and the data sets will not be used. 



